www.gusucode.com > 网域标准通用企业自助建站系统正式版 2009 > 网域标准通用企业自助建站系统正式版 2009.18/网域公司企业网站管理系统ACCESS和SQL正式版/网域公司企业网站管理系统ACCESS正式版/EnProductShow.asp
<!--#include file="Inc/EnSysProduct.asp" -->
<!--#include file="inc/Skin_css.asp"-->
<script language="JavaScript">
<!--
var flag=false;
function DrawImage(ImgD){
var image=new Image();
image.src=ImgD.src;
if(image.width>0 && image.height>0){
flag=true;
if(image.width/image.height>= 200/200){
if(image.width>200){
ImgD.width=200;
ImgD.height=(image.height*200)/image.width;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt="点击查看详细信息...";
}
else{
if(image.height>200){
ImgD.height=200;
ImgD.width=(image.width*200)/image.height;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt="点击查看详细信息...";
}
}
}
//-->
</script>
<%
ShowSmallClassType=ShowSmallClassType_Article
dim ID
ID=trim(request("ID"))
if ID="" then
response.Redirect("EnProduct.asp")
end if
sql="select * from Product where ID=" & ID & ""
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,3
if rs.bof and rs.eof then
response.write"<SCRIPT language=JavaScript>alert('找不到此产品！');"
response.write"javascript:history.go(-1)</SCRIPT>"
else
rs("Hits")=rs("Hits")+1
rs.update
%>
<!-- #include file="EnHead.asp" -->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="5" valign="top" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td height="72" valign="top" bgcolor="#FFFFFF"><table width="746" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td class="tdbg_left" width="190" height="179" valign="top" > <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> User
login</td>
</tr>
<tr>
<td height="5"></td>
</tr>
<tr>
<td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<% call ShowUserLogin() %>
</td>
</tr>
</table></td>
</tr>
<tr>
<td height="5"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> Prouduct
list</td>
</tr>
<tr>
<td height="5"></td>
</tr>
<tr>
<td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<% call ShowSmallClass_Tree() %>
</td>
</tr>
</table></td>
</tr>
<tr>
<td height="5"></td>
</tr>
</table></td>
<td width="6"></td>
<td valign="top"><table Class=border width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="206" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="title_right" height="32"> <img src="Images/smallbook.jpg" width="10" height="10"> Product
Show </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<TR>
<TD width="452"
height=25> <%
response.write " <a href='EnProduct.asp?EnBigClassName=" & rs("EnBigClassName") & "'>" & rs("EnBigClassName") & "</a> >> "
if rs("EnSmallClassName") & ""<>"" then
response.write "<a href='EnProduct.asp?EnBigClassName=" & rs("EnBigClassName")&"&EnSmallClassName=" & rs("EnSmallClassName") & "'>" & rs("EnSmallClassName") & "</a> >> "
end if
response.write rs("EnTitle")
%> </TD>
<TD width="98"><a href="EnPayment.asp?Product_Id=<%=rs("Product_Id")%>",target="_blank"><img border=0 src=Images/Eninquire_now.gif
width=86 height=21></a></TD>
</TR>
<TR>
<TD
height=1 colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD height="42" colspan="3"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="21" colspan="4"> </td>
</tr>
<tr>
<%fileExt=lcase(getFileExtName(rs("DefaultPicUrl")))%>
<td width="41%" rowspan="5"><font color="#FF6600"> </font><font color="#FF6600"> </font>
<%if fileext="jpg" or fileext="bmp" or fileext="png" or fileext="gif" then%> <a href="<%=rs("DefaultPicUrl")%>" target="_blank"><img style="BORDER-LEFT-COLOR: #cccccc; BORDER-BOTTOM-COLOR: #cccccc; BORDER-TOP-COLOR: #cccccc; BORDER-RIGHT-COLOR: #cccccc" src=<%=rs("DefaultPicUrl")%> width="200" height="200" onload="javascript:DrawImage(this);"></a>
<%else
if fileext="swf" then%> <object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0' width='200' height='200'>
<param name=movie value='<%=rs("DefaultPicUrl")%>'>
<param name=quality value=high>
<param name='Play' value='-1'>
<param name='Loop' value='0'>
<param name='Menu' value='-1'>
<embed src='<%=rs("DefaultPicUrl")%>' width='200' height='200' pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' ></embed>
</object> <%end if
end if%> </td>
<td width="2%" rowspan="5"> </td>
<td height="39"><div align="left">Number:</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs("Product_Id")%></strong></font></td>
</tr>
<tr>
<td width="10%" height="39"><div align="left">Name:</div></td>
<td width="47%" height="40"><font color="#FF6600"><strong><%=rs("Entitle")%></strong></font></td>
</tr>
<tr>
<td height="31"><div align="left">Spec:</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs("EnSpec")%></strong></font></td>
</tr>
<tr>
<td height="29"><div align="left">Memo:</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs("EnMemo")%></strong></font></td>
</tr>
<tr>
<td height="31"><div align="left">Class:</div></td>
<td height="40"><font color="#FF6600"><strong><%=rs("EnBigClassName")%></strong></font></td>
</tr>
<tr>
<td height="9" colspan="4"> </td>
</tr>
</table></TD>
</TR>
<TR>
<TD class="title_right" height="37" colspan="3"> <img src="Images/smallbook.jpg" width="10" height="10">
Product Readme</TD>
</TR>
<TR>
<TD height="1" colspan="3"> <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> <%call ShowProductContent()%> </td>
</tr>
</table></TD>
</TR>
<TR>
<TD
height=1 colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif"
width=10></TD>
</TR>
<TR>
<TD
height=25>Hits：<%=rs("Hits")%> UpdateTime：<%= FormatDateTime(rs("UpdateTime"),2) %> 【<a href='javascript:window.print()'>Print</a>】 【<a href="javascript:self.close()">Close</a>】</TD>
<TD
height=25><a href="EnPayment.asp?Product_Id=<%=rs("Product_Id")%>",target="_blank"><img border=0 src=Images/Eninquire_now.gif
width=86 height=21></a></TD>
</TR>
</table> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<!-- #include file="Inc/EnFoot.asp" -->
</BODY></HTML>
<%
end if
rs.close
set rs=nothing
call CloseConn()
%>